home *** CD-ROM | disk | FTP | other *** search
/ CyberMycha Extra 2004 January / CyberMycha Extra 1-2004 (Poland) (Disc 2).bin / Pippi / gmsb.dir / Internal_59_buttonLowerHelpGMSBmain.ls < prev    next >
Encoding:
Text File  |  2001-09-12  |  640 b   |  32 lines

  1. property meNum, myName, meSprite, meMember, meHmember, mePmember
  2. global monkey
  3.  
  4. on beginSprite me
  5.   meNum = me.spriteNum - 144
  6.   meSprite = sprite(me.spriteNum)
  7.   meMember = meSprite.member
  8.   myName = meSprite.member.name
  9.   meHmember = member(myName & "h", 2)
  10.   mePmember = member(myName & "p", 2)
  11. end
  12.  
  13. on mouseEnter me
  14.   meSprite.member = meHmember
  15. end
  16.  
  17. on mouseLeave me
  18.   meSprite.member = meMember
  19. end
  20.  
  21. on mouseUp me
  22.   monkey.callFromDownButton(meNum, meSprite)
  23. end
  24.  
  25. on GoScript me
  26.   monkey.reCoverMe()
  27.   monkey.meSprite.ButNum = 0
  28.   if sound(2).member <> member("introSnd", 1) then
  29.     sound(2).play(member("helpSnd2", 1))
  30.   end if
  31. end
  32.